﻿Public Module DCM_SQL
    Public Function GetCN_Connect(CN_Connect As DCMHttp_Enum_DataBaseName) As String
        Select Case CN_Connect
            Case DCMHttp_Enum_DataBaseName.AIS20190703103245_141_new
                Return "Server=192.168.0.141;Database=AIS20190703103245;User ID=SA;Trusted_Connection=False;pwd=139$tt_483f("
                'Return "Server=192.168.0.100;Database=RSDBU_OLT;User ID=SA;Trusted_Connection=False;pwd=139$tt_483f("
            Case DCMHttp_Enum_DataBaseName.CQPUMP_FTP_32
                Return "Server=192.168.0.32;Database=CQPUMP_FTP;User ID=SA;Trusted_Connection=False;pwd=Exde3333"
            Case DCMHttp_Enum_DataBaseName.RSDBU_OLT_100
                Return "Server=192.168.0.100;Database=RSDBU_OLT;User ID=SA;Trusted_Connection=False;pwd=139$tt_483f("
            Case DCMHttp_Enum_DataBaseName.RSDBU_OLT_32
                Return "Server=192.168.0.32;Database=RSDBU_OLT;User ID=SA;Trusted_Connection=False;pwd=Exde3333"
            Case DCMHttp_Enum_DataBaseName.D0001_100
                Return "Server=192.168.0.100;Database=D0001;User ID=SA;Trusted_Connection=False;pwd=139$tt_483f("
            Case DCMHttp_Enum_DataBaseName.CQSB_PDM436SP4_100
                Return "Server=192.168.0.100;Database=CQSB_PDM436SP4;User ID=SA;Trusted_Connection=False;pwd=139$tt_483f("
            Case DCMHttp_Enum_DataBaseName.CRM_100
                Return "Server=192.168.0.100;Database=CRM;User ID=SA;Trusted_Connection=False;pwd=139$tt_483f("
            Case DCMHttp_Enum_DataBaseName.CQPUMP_Main_100
                Return "Server=192.168.0.100;Database=CQPUMP_Main;User ID=SA;Trusted_Connection=False;pwd=139$tt_483f("
            Case DCMHttp_Enum_DataBaseName.AIS20071015135307_20
                Return "Server=192.168.0.20;Database=AIS20071015135307;User ID=SA;Trusted_Connection=False;pwd=139$tt_483f("
            Case DCMHttp_Enum_DataBaseName.AIS20071015135307_old1_20
                Return "Server=192.168.0.20;Database=AIS20071015135307_old1;User ID=SA;Trusted_Connection=False;pwd=139$tt_483f("
            Case DCMHttp_Enum_DataBaseName.Test_4
                Return "Server=192.168.0.100;pwd=139$tt_483f(;Database=test;User ID=SA;Trusted_Connection=False"
            Case DCMHttp_Enum_DataBaseName.CQPUMP_ERP_4
                Return "Server=192.168.0.100;pwd=139$tt_483f(;Database=CQPUMP_ERP;User ID=SA;Trusted_Connection=False"
            Case DCMHttp_Enum_DataBaseName.CQPUMP_MES_4
                Return "Server=192.168.0.100;pwd=139$tt_483f(;Database=CQPUMP_MES;User ID=SA;Trusted_Connection=False"
            Case DCMHttp_Enum_DataBaseName.STCard_Enp_4
                Return "Server=192.168.0.40;Database=STCard_Enp;User ID=SA;Trusted_Connection=False;pwd=139$tt_483f("
            Case DCMHttp_Enum_DataBaseName.STPHOTO_4
                Return "Server=192.168.0.40;Database=STPHOTO;User ID=SA;Trusted_Connection=False;pwd=139$tt_483f("
            Case DCMHttp_Enum_DataBaseName.EastRiver_40
                Return "Server=192.168.0.40;Database=EastRiver;User ID=SA;Trusted_Connection=False;pwd=139$tt_483f("
            Case DCMHttp_Enum_DataBaseName.CbQuotaSys
                Return "Server=192.168.0.100;Database=CbQuotaSys;User ID=SA;Trusted_Connection=False;pwd=139$tt_483f("
            Case DCMHttp_Enum_DataBaseName.CQPI_cmehr
                Return "Data Source=(DESCRIPTION=(ADDRESS=(PROTOCOL=TCP)(HOST=10.200.1.14)(PORT=1521))" & "(CONNECT_DATA=(Service_Name=cmehr)));User Id=cmehr;Password=kingdee;"
            Case Else
                Throw New Exception("无法找到为" & CN_Connect.ToString & "的链接")
        End Select
    End Function
End Module
